package com.xci.platform.controller;

import com.xci.platform.core.BoolMessage;
import com.xci.platform.helper.DateHelper;
import com.xci.platform.helper.StringHelper;
import com.xci.platform.upload.IUploadFile;
import com.xci.platform.upload.UploadFileInfo;
import com.xci.platform.upload.UploadFileOptions;
import org.springframework.stereotype.Controller;
import org.springframework.util.MultiValueMap;
import org.springframework.web.bind.annotation.GetMapping;
import org.springframework.web.bind.annotation.PostMapping;
import org.springframework.web.bind.annotation.RequestMapping;
import org.springframework.web.bind.annotation.ResponseBody;
import org.springframework.web.multipart.MultipartFile;
import org.springframework.web.multipart.support.StandardMultipartHttpServletRequest;

import javax.annotation.Resource;
import javax.servlet.http.HttpServletRequest;
import java.io.File;
import java.text.SimpleDateFormat;
import java.util.*;

@Controller
@RequestMapping("/kindeditor")
public class KindEditorFileController {
    private String rootDir = "/upload/kindeditor/";//文件保存目录路径

    /**
     * 文件上传
     */
    @Resource
    private IUploadFile uploadFile;

    @ResponseBody
    @PostMapping("/upload")
    public Object upload(HttpServletRequest request) {
        MultiValueMap<String, MultipartFile> multipartFiles =
                ((StandardMultipartHttpServletRequest) request).getMultiFileMap();

        String dirName = request.getParameter("dir");
        if (StringHelper.isBlank(dirName)) {
            dirName = "image";
        }

        String finalDirName = dirName;
        if (Arrays.stream(new String[]{"image", "flash", "media", "file"}).noneMatch(p -> p.toLowerCase().equals(finalDirName))) {
            return new BoolMessage<>(false, "目录名不正确");
        }
        UploadFileOptions options = new UploadFileOptions();
        options.setUploadPath(StringHelper.format(rootDir + "{}/{}/", dirName, DateHelper.formatDate(new Date(), "yyyyMMdd")));
        options.setAllowMaxSize(1024 * 50);//50M
        options.setAllowExtension(new String[]{"gif", "jpg", "jpeg", "png", "bmp", "swf", "flv", "mp3", "mp4", "wav", "wma", "wmv", "mid", "avi", "mpg", "asf", "rm", "rmvb", "zip", "rar", "doc", "docx", "xls", "xlsx", "ppt", "pptx", "txt", "gz", "bz2"});

        BoolMessage<UploadFileInfo> result = new BoolMessage<>(false, "请指定上传的文件");
        for (List<MultipartFile> multipartFilex : multipartFiles.values()) {
            for (MultipartFile multipartFile : multipartFilex) {
                result = uploadFile.upload(multipartFile, options);
            }
        }

        Map<String, Object> obj = new HashMap<>();
        if (result.isSuccess()) {
            obj.put("error", 0);
            obj.put("url", request.getContextPath() + result.getData().getVirtualUrl());
        } else {
            obj.put("error", 1);
            obj.put("message", result.getMsg());
        }
        return obj;
    }

    @ResponseBody
    @GetMapping("/manager")
    public Object manager(HttpServletRequest request) {
        String rootPath = new File("").getAbsolutePath() + rootDir;
        String rootUrl = request.getContextPath()+rootDir;
        //图片扩展名
        String[] fileTypes = new String[]{"gif", "jpg", "jpeg", "png", "bmp"};

        String dirName = request.getParameter("dir");
        if (dirName != null) {
            if (!Arrays.<String>asList(new String[]{"image", "flash", "media", "file"}).contains(dirName)) {
                return "无效的目录名称";
            }
            rootPath += dirName + "/";
            rootUrl += dirName + "/";
            File saveDirFile = new File(rootPath);
            if (!saveDirFile.exists()) {
                saveDirFile.mkdirs();
            }
        }
        //根据path参数，设置各路径和URL
        String path = request.getParameter("path") != null ? request.getParameter("path") : "";
        String currentPath = rootPath + path;
        String currentUrl = rootUrl + path;
        String currentDirPath = path;
        String moveupDirPath = "";
        if (!"".equals(path)) {
            String str = currentDirPath.substring(0, currentDirPath.length() - 1);
            moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0, str.lastIndexOf("/") + 1) : "";
        }

        //排序形式，name or size or type
        String order = request.getParameter("order") != null ? request.getParameter("order").toLowerCase() : "name";

        //不允许使用..移动到上一级目录
        if (path.indexOf("..") >= 0) {
            return "拒绝访问";
        }
        //最后一个字符不是/
        if (!"".equals(path) && !path.endsWith("/")) {
            return "无效参数";
        }
        //目录不存在或不是目录
        File currentPathFile = new File(currentPath);
        if (!currentPathFile.isDirectory()) {
            return "目录不存在";
        }

        //遍历目录取的文件信息
        List<Hashtable> fileList = new ArrayList<Hashtable>();
        if (currentPathFile.listFiles() != null) {
            for (File file : currentPathFile.listFiles()) {
                Hashtable<String, Object> hash = new Hashtable<String, Object>();
                String fileName = file.getName();
                if (file.isDirectory()) {
                    hash.put("is_dir", true);
                    hash.put("has_file", (file.listFiles() != null));
                    hash.put("filesize", 0L);
                    hash.put("is_photo", false);
                    hash.put("filetype", "");
                } else if (file.isFile()) {
                    String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
                    hash.put("is_dir", false);
                    hash.put("has_file", false);
                    hash.put("filesize", file.length());
                    hash.put("is_photo", Arrays.<String>asList(fileTypes).contains(fileExt));
                    hash.put("filetype", fileExt);
                }
                hash.put("filename", fileName);
                hash.put("datetime", new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file.lastModified()));
                fileList.add(hash);
            }
        }

        if ("size".equals(order)) {
            Collections.sort(fileList, new SizeComparator());
        } else if ("type".equals(order)) {
            Collections.sort(fileList, new TypeComparator());
        } else {
            Collections.sort(fileList, new NameComparator());
        }
        Map<String, Object> result = new HashMap<>();
        result.put("moveup_dir_path", moveupDirPath);
        result.put("current_dir_path", currentDirPath);
        result.put("current_url", currentUrl);
        result.put("total_count", fileList.size());
        result.put("file_list", fileList);
        return result;
    }

    public class NameComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;
            Hashtable hashB = (Hashtable) b;
            if (((Boolean) hashA.get("is_dir")) && !((Boolean) hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean) hashA.get("is_dir")) && ((Boolean) hashB.get("is_dir"))) {
                return 1;
            } else {
                return ((String) hashA.get("filename")).compareTo((String) hashB.get("filename"));
            }
        }
    }

    public class SizeComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;
            Hashtable hashB = (Hashtable) b;
            if (((Boolean) hashA.get("is_dir")) && !((Boolean) hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean) hashA.get("is_dir")) && ((Boolean) hashB.get("is_dir"))) {
                return 1;
            } else {
                if (((Long) hashA.get("filesize")) > ((Long) hashB.get("filesize"))) {
                    return 1;
                } else if (((Long) hashA.get("filesize")) < ((Long) hashB.get("filesize"))) {
                    return -1;
                } else {
                    return 0;
                }
            }
        }
    }

    public class TypeComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;
            Hashtable hashB = (Hashtable) b;
            if (((Boolean) hashA.get("is_dir")) && !((Boolean) hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean) hashA.get("is_dir")) && ((Boolean) hashB.get("is_dir"))) {
                return 1;
            } else {
                return ((String) hashA.get("filetype")).compareTo((String) hashB.get("filetype"));
            }
        }
    }
}
